home *** CD-ROM | disk | FTP | other *** search
/ Tiger Disk 41 / Tiger_Disk_041_1997-08_Tiger-Crew-Disk_de_Side_B.d64 / scroll-protect (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  1KB  |  33 lines
  1. 1 gosub190
  2. 10 poke770,131:poke771,164
  3. 20 poke88,0:poke89,192
  4. 30 poke90,0:poke91,192
  5. 40 poke781,33:poke782,0
  6. 50 sys41964
  7. 60 poke88,254:poke89,255
  8. 70 poke90,254:poke91,255
  9. 80 poke781,33:poke782,0
  10. 90 sys41964
  11. 100 poke59639,2
  12. 110 poke1,53
  13. 120 :
  14. 125 poke198,0:wait198,1:poke198,0
  15. 130 print"":list10-110
  16. 190 poke53280,8:poke53281,9:poke646,15
  17. 195 print"[147]                                                    ";
  18. 196 print"[146]scroll-protect             ";
  19. 200 print"                                         [146]";
  20. 201 print"zeile 10 schaltet fastload aus
  21. 202 [153]"zeile 20-50 legt basic vom rom zum ram
  22. 204 print"zeile 60-90 legt kernal rom zum ram
  23. 206 [153]"zeile 100 setzt die anzahl fester        zeilen am oberen screen-rand ";
  24. 207 [153]"plus 1 :":[153]" eine '2' bedeutet dass 3 zeilen stehen- bleiben"
  25. 209 [153]"zeile 110 schaltet basic und kernal im   rom aus und schaltet basic";
  26. 210 [153]" und kernal":[153]" im ram ein.  poke1,55 schaltet wieder   auf normal.
  27. 211 print" du kannst mit 1 und 53 bzw. 55 beliebig umschalten.
  28. 214 [153]" die zeilen am oberen screenrand koennen auch mit poke 59652,n
  29. 215 print" gehalten werden, wobei n=24 minus der   anzahl der zeilen, die nicht
  30. 216 [153]" scrollen sollen, ist.
  31. 217 print" beispiel: fuer 1 zeile =                poke59652,23
  32. 218 [142]
  33.